0 REM << RR25-3 >>
1 REM =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
2 REM     - ASCII TRANSMITTER -
3 REM       RUPERT REPORT #25
4 REM =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
5 REM TRANSMIT ASCII FORM OF PROGRAM
6 REM OVER THE RS-232 CHANNEL
7 REM =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
8 OPEN 2,2,0,CHR$(8) : CMD 2 : LIST
9 PRINT#2,CHR$(26):PRINT#2:CLOSE 2:END
10 REM  -ADD THIS PROGRAM TO THE PROGRAM TO BE TRANSMITTED AND TYPE 'RUN 8'
11 REM  -WHEN THE LISTING IS DONE,
12 REM  -TYPE 'RUN 9' TO CLOSE THE FILE